;; The first three lines of this file were inserted by DrScheme. They record metadata
;; about the language level of this file in a form that our tools can easily process.
#reader(planet plai/plai:1:3/lang/reader)
(define (soma-2-maiores-ao-quadrado a b c)
  (cond
    [(and (>= a c) (>= b c)) (+ (* a a) (* b b))]
    [(and (>= a b) (>= c b)) (+ (* a a) (* c c))]
    [else (+ (* b b) (* c c))]))
      
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; testes

(print-only-errors #t)

(test (soma-2-maiores-ao-quadrado 4 3 2) 25)
(test (soma-2-maiores-ao-quadrado 4 2 3) 25)
(test (soma-2-maiores-ao-quadrado 2 3 4) 25)
(test (soma-2-maiores-ao-quadrado 2 4 3) 25)
(test (soma-2-maiores-ao-quadrado 3 4 2) 25)
(test (soma-2-maiores-ao-quadrado 3 2 4) 25)
(test (soma-2-maiores-ao-quadrado 4 4 2) 32)
(test (soma-2-maiores-ao-quadrado 2 4 4) 32)
(test (soma-2-maiores-ao-quadrado 4 2 4) 32)
(test (soma-2-maiores-ao-quadrado 4 2 2) 20)
(test (soma-2-maiores-ao-quadrado 2 4 2) 20)
(test (soma-2-maiores-ao-quadrado 2 2 4) 20)

(include "test-summary.scm")
